﻿Imports System.ServiceModel

Public Class MenuPrincipal

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        'Dim strDB As String   '"personas.personasDB, personas"
        'Dim objectType As Type = Type.GetType("Domain.Entidades.Personas, Personas", True)
        'Dim entDb As Object = Activator.CreateInstance(objectType)

        'Return entDb

        Dim frm As New frmBandejaPrincipal
        'frm.Entidad = entPersonas
        frm.Show()

    End Sub

    Private Sub MenuPrincipal_Activated(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Activated
        'MsgBox("lalala")

    End Sub

    Private Sub MenuPrincipal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class